(*~\Глагол\Отделы\Обмен~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*)
(**)                        ОТДЕЛ Ввод;
(*============================================================================* 
 * НАЗНАЧЕНИЕ: ввод от клавиатуры и мышки                                     * 
 *============================================================================*)
ПОСТ
               (* откуда посылка *)
  пустой- =0;
  клавиши-=1;
  мышка-  =2;
  закрыт- =3;
               (* управляющие клавиши *)
  пАльт-   =0;
  лАльт-   =1;
  пКонтр-  =2;
  лКонтр-  =3;
  шифт-    =4;
  нумЛок-  =5;
  скролЛок-=6;
  капсЛок- =7;
               (* кнопки у мышки *)
  левая-   =0;
  правая-  =1;
  средняя- =2;
               (* события у мышки *)
  смещение-=0;
  щелк2-   =1;
  прокрут- =2;
ВИД
                    (* Абстрактный набор - предок других наборов *)
  Посылка-=НАБОР КОН;

  ОтКлавиш-=НАБОР(Посылка)
    код+:ЦЕЛ;       (* рабочий код клавиши, :=0 после отработки *)
    знак+:ЗНАК;
    упрКнопки+:МНОЖ;
    упрШифт+:КЛЮЧ;  (* есть управление от Shift (шифт) *)  
    упрКонтр+:КЛЮЧ; (* есть управление от Ctrl (контр) *)
    упрАльт+:КЛЮЧ;  (* есть управление от Alt (альт) *)
    мкод+:ЦЕЛ;      (* машинный код клавиши *)
  КОН;

  ОтМышки-=НАБОР(Посылка)
    к+,с+:ЦЕЛ;    
    кнопки+:МНОЖ;
    упрКнопки+:МНОЖ; 
    события+:МНОЖ;
    прокрут+:ЦЕЛ;     (* щелчков колёсика *)
    отработана+:КЛЮЧ; (* выставляет получатель *)
  КОН;

КОН Ввод.